home *** CD-ROM | disk | FTP | other *** search
/ SGI Developer Toolbox 6.1 / SGI Developer Toolbox 6.1 - Disc 4.iso / public / fax / src / port / linux / mkdepend < prev    next >
Text File  |  1994-08-01  |  6KB  |  234 lines
  1. #! /bin/sh
  2. #    $Header: /usr/people/sam/fax/port/linux/RCS/mkdepend,v 1.3 1994/02/28 14:28:13 sam Rel $
  3. #
  4. # FlexFAX Facsimile Software
  5. #
  6. # Copyright (c) 1990, 1991, 1992, 1993, 1994 Sam Leffler
  7. # Copyright (c) 1991, 1992, 1993, 1994 Silicon Graphics, Inc.
  8. # 
  9. # Permission to use, copy, modify, distribute, and sell this software and 
  10. # its documentation for any purpose is hereby granted without fee, provided
  11. # that (i) the above copyright notices and this permission notice appear in
  12. # all copies of the software and related documentation, and (ii) the names of
  13. # Sam Leffler and Silicon Graphics may not be used in any advertising or
  14. # publicity relating to the software without the specific, prior written
  15. # permission of Sam Leffler and Silicon Graphics.
  16. # 
  17. # THE SOFTWARE IS PROVIDED "AS-IS" AND WITHOUT WARRANTY OF ANY KIND, 
  18. # EXPRESS, IMPLIED OR OTHERWISE, INCLUDING WITHOUT LIMITATION, ANY 
  19. # WARRANTY OF MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE.  
  20. # 
  21. # IN NO EVENT SHALL SAM LEFFLER OR SILICON GRAPHICS BE LIABLE FOR
  22. # ANY SPECIAL, INCIDENTAL, INDIRECT OR CONSEQUENTIAL DAMAGES OF ANY KIND,
  23. # OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
  24. # WHETHER OR NOT ADVISED OF THE POSSIBILITY OF DAMAGE, AND ON ANY THEORY OF 
  25. # LIABILITY, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE 
  26. # OF THIS SOFTWARE.
  27. #
  28. # NAME
  29. #    mkdepend - compute header file dependencies
  30. # SYNOPSIS
  31. #    mkdepend [-c compiler] [-e sedprog] [-f force] [-ipr] [-s sentinel]
  32. #        depfile file ...
  33. # DESCRIPTION
  34. #    See mkdepend(1).
  35. #
  36. me=$0
  37. usage="usage: $me [-c compiler] [-e sedprog] [-f force] [-ipr]\n\t[-s sentinel] depfile [file ...]"
  38. depgen="gcc -M"
  39. incremental=no
  40. rawdepinput=no
  41.  
  42. #
  43. # Process options and arguments.  We put quotes around the edit (-e) arguments
  44. # and use eval "sed -e ..." later, to preserve spaces in the edit command.
  45. #
  46.  
  47. set -- "$@"
  48.  
  49. while [ $# -gt 0 ] ; do
  50.     case $1 in
  51.       -c)    depgen=$2; shift;;
  52.       -e)    sedprog="$sedprog -e '$2'"; shift;;
  53.       -f)    force="$force $2"; shift;;
  54.       -i)    incremental=yes;;
  55.       -p)    depgen=collapse pcount=$2 rawdepinput=yes; shift;;
  56.       -r)    depgen=cat rawdepinput=yes;;
  57.       -s)    sentinel=$2 ; shift;;
  58.       -*)    echo $usage; exit 2;;
  59.       *)    break;;
  60.     esac
  61.     shift
  62. done
  63.  
  64. if [ $# -eq 0 ] ; then
  65.     echo $usage; exit 2
  66. fi
  67.  
  68. newdepfile=$1
  69. depfiledir=`dirname $1`
  70. olddepfile=$depfiledir/#`basename $1`
  71. shift
  72.  
  73. #
  74. # A shell function to collapse dependencies of targets in subdirectories
  75. # on common rightsides.
  76. #
  77. collapse() {
  78.     sed -e 's@/\([^/:]*\): @/%\1: @' $* |
  79.     sort -t% +1 |
  80.     uniq |
  81.     awk -F: '
  82.     BEGIN {
  83.         total = '$pcount'
  84.     }
  85.     function flush(group, lastdir, dirname, count) {
  86.         for (dirname in group)
  87.             count++
  88.         if (count == total) {
  89.             print group[lastdir]
  90.         } else {
  91.             for (dirname in group)
  92.                 print dirname group[dirname]
  93.         }
  94.         for (dirname in group)
  95.             delete group[dirname]
  96.     }
  97.     {
  98.         percent = index($1, "%")
  99.         name = substr($1, percent + 1)
  100.         if (name != basename || $2 != rightside) {
  101.             flush(group, dirname)
  102.             basename = name
  103.             rightside = $2
  104.         }
  105.         dirname = substr($1, 1, percent - 1)
  106.         group[dirname] = basename ":" rightside
  107.     }
  108.     END {
  109.         flush(group, dirname)
  110.     }' |
  111.     sort
  112. }
  113.  
  114. #
  115. # An awk script to compress and pretty-print dependencies.
  116. #
  117. awkprog='
  118. BEGIN {
  119.     FS = ":"
  120.     INDENT = "\t"
  121.     INDENTSIZE = 8
  122.     MAXLINE = 72
  123.     MAXINDENTEDLINE = MAXLINE - INDENTSIZE - 1
  124. }
  125.  
  126. #
  127. # For each line of the form "target1 ... targetN: dependent", where the
  128. # spaces are literal blanks, do the following:
  129. #
  130. {
  131.     if ($1 != target) {
  132.         if (depline) print depline
  133.         target = $1
  134.         depline= $0 "'"$force"'"
  135.         lim = MAXLINE
  136.     } else {
  137.         if (length(depline) + length($2) > lim) {
  138.             print depline " \\"
  139.             depline = INDENT
  140.             lim = MAXINDENTEDLINE
  141.         }
  142.         depline = depline $2
  143.     }
  144. }
  145.  
  146. END {
  147.     if (depline) print depline 
  148. }'
  149.  
  150. #
  151. # Save the old file in case of problems.  Define some temporary files for
  152. # incremental make depend.  Clean up if interrupted.
  153. #
  154. olddeps=/tmp/olddeps.$$
  155. newdeps=/tmp/newdeps.$$
  156. tmpdeps=$depfiledir/tmpdeps.$$
  157. if test "$incremental" = yes; then
  158.     trapcmds="rm -f $olddeps $newdeps $tmpdeps;"
  159. fi
  160. if test -f "$newdepfile"; then
  161.     trapcmds="$trapcmds mv -f \\$olddepfile \\$newdepfile;"
  162.     ln $newdepfile $olddepfile
  163.     echo "# placeholder in case make includes me" > $tmpdeps
  164.     mv -f $tmpdeps $newdepfile
  165. fi
  166. trap "$trapcmds exit 0" 1 2 15
  167.  
  168. #
  169. # Remove any old dependencies from the file.
  170. #
  171. firstline="#$sentinel DO NOT DELETE THIS LINE -- make depend uses it"
  172. lastline="#$sentinel DO NOT DELETE THIS 2nd LINE -- make depend uses it"
  173.  
  174. if test -f "$olddepfile"; then
  175.     sed -e "/^$firstline/,/^$lastline/d" $olddepfile
  176. fi > $newdepfile
  177.  
  178. #
  179. # Delimit the beginning of the dependencies.  Save the old dependencies
  180. # in incremental mode.
  181. #
  182. echo $firstline >> $newdepfile
  183. if test $incremental = yes; then
  184.     #
  185.     # XXX Workaround for this sed bug: 1,/pat/d deletes 1,$ if line 1
  186.     # XXX and only line 1 matches pat.
  187.     #
  188.     (echo '# food for sed bug to eat'; cat $olddepfile 2> /dev/null) |
  189.         sed -e "1,/^$firstline/d" -e "/^$lastline/"',$d' > $olddeps
  190.  
  191.     #
  192.     # Compose an awk program that deletes pretty-printed dependencies
  193.     # from $olddeps that involve basenames of objects (in the raw input)
  194.     # or sources (arguments) whose dependencies are being updated.
  195.     #
  196.     awkinc='/^[^     ]/ { deleting = 0; }'
  197.     if test $rawdepinput = yes; then
  198.         cat $* > $newdeps
  199.         for f in `sed -e 's@^\([^:/]*\)\.[^:/]*: .*@\1@' \
  200.                   -e 's@^[^:]*/\([^:/]*\)\.[^:/]*: .*@\1@' \
  201.                   $newdeps |
  202.               sort -u`; do
  203.             list="$list $f"
  204.         done
  205.         set -- $newdeps
  206.     else
  207.         for f in $*; do
  208.             list="$list `expr ./$f : '.*/\(.*\)\..*'`"
  209.         done
  210.     fi
  211.     for f in $list; do
  212.         awkinc="$awkinc /^$f\./ || /^[^     :]*\/$f\./ { deleting = 1; }"
  213.     done
  214.     awkinc="$awkinc { if (!deleting) print \$0; }"
  215.     awk "$awkinc" $olddeps >> $newdepfile
  216.     rm -f $olddeps
  217. fi
  218.  
  219. #
  220. # Process source files - the sed commands and their functions are: 
  221. #    s:[^\./][^\./]*/\.\./::g    rewrite "dir/../path" to be "path"
  222. #    s:\([/ ]\)\./:\1:g        rewrite " ./path" to be " path" and
  223. #                    remove the "./" from  ".././h/x.h"
  224. #
  225. $depgen $* |
  226.     eval "sed \
  227.     -e :loop -e 's:[^\./][^\./]*/\.\./::g' -e tloop \
  228.     -e 's:\([/ ]\)\./:\1:g' \
  229.     $sedprog" |
  230.     awk "$awkprog" >> $newdepfile
  231.  
  232. echo $lastline >> $newdepfile
  233. rm -f $olddepfile $newdeps
  234.